"; $ontl_strt = microtime(true); $userip=$_SERVER['REMOTE_ADDR']; $vg=0; $ial_sw=0; set_time_limit(0); session_start(); $sess_idnt=session_id(); // echo "
SESSION ID ".$sess_idnt." SERVER ".$srvr; echo "
EERSTE INDRUK INVR TAAL ".$invr_taal." BZV1 ".$invr_bzv1." BZV2 ".$invr_bzv2." LNKS ".$invr_lnks."RCHS ".$invr_rchs." CHBT ".$invr_chbt." DOMN ".$invr_domn; include ("conv.php"); $sinvr_domn=str_replace(" ","+",$invr_domn); $invr_domn=str_replace("+","_",$invr_domn); $invr_bzv1=str_replace(" xcomx ",", ",$invr_bzv1); $invr_bzv1=str_replace(" xminx ","-",$invr_bzv1); $invr_bzv1=str_replace($invr_domn,".",$invr_bzv1); $invr_text[taal]=$invr_taal; $invr_text[chbt]=$invr_chbt; $invr_text[domn]=$invr_domn; $invr_text[lnks]=$invr_lnks; $invr_text[rchs]=$invr_rchs; $invr_text[bzv1]=$invr_bzv1; $invr_text[bzv2]=$invr_bzv2; // print_r($invr_text); include ("config.php"); include ("bwrk-bzv1-func.php"); include ("bepl-taal-func.php"); include ("text-isrt-func.php"); include ("bwrk-bzkr-func.php"); include ("smta-tlkd-func-0017.php"); ?>

SENTENCE<? echo $invr_bzv1; ?> > > > > > >

".$datm; $taal_rslt=bepl_taal($invr_bzv1); asort($taal_rslt); // print_r($taal_rslt); foreach($taal_rslt as $taal_key => $taal_val) { // $text_taal=$taal_key; // echo "
KEY ".$taal_key." VAL ".$taal_val; } $sql_gw27="SELECT * FROM cldr where `datm` = '$datm_datm' order by `lnks` desc"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $gw27_result = mysql_query($sql_gw27, $link); $gw27_mtch = mysql_num_rows($gw27_result); // echo "
GRAM rule SQL Aantal entries ".$gw27_mtch." for ".$sql_gw27." and DOMN ".$rbzv1_domn; if ($gw27_mtch > 0 ) { // echo "
rule SQL Aantal entries ".$gw27_mtch." for ".$sql_gw27; // echo "
domn ".$invr_domn. "BZV1 ". $invr_bzv1." BZV2 ".$invr_bzv2; while ($row = mysql_fetch_assoc($gw27_result)) { $grule=$gram_rule; $gw27_ipad=$row['ipad']; $gw27_taal=$row['taal']; $gw27_domn=$row['domn']; // echo "
GW27 RCHS ".$gw27_rchs; $gw27_lnks=$row['lnks']; $gw27_rchs=$row['rchs']; $gw27_datm=$row['datm']; $bzdt_dag=$gw27_rchs; // echo "
SHRT 0001 GW27 DOMN ".$gw27_domn." LNKS ".$gw27_lnks." RCHS ".$gw27_rchs." PROCES ".$gw27_domn." lnks ".$invr_lnks." RCHS ".$invr_rchs; } } $versie="SEMANTA alpha versie 15.01.03"; $modl="tlkd-ruledotphp"; /////////////////////// // echo ''; /////////////////////// require_once ("isrt-text.php"); // echo "
BEFORE WORD RULE domn ".$invr_domn. "BZV1 ". $invr_bzv1." BZV2 ".$invr_bzv2." taal ".$invr_taal; $lngt_bzv1=strlen($invr_bzv1); // echo "
LENGTH ".$lngt_bzv1; if ($invr_bzv1[$lngt_bzv1-1] == ".") { // echo "
LAST POS IS PERIOD"; $url_bzv1=urlencode($invr_bzv1); // echo "
URL BZV1 ".$url_bzv1; $invr_bzv1=substr($invr_bzv1,0,$lngt_bzv1-1); // echo "
TRIMMED BZV1 ".$invr_bzv1; } //////////////////////// $perd_itms=explode(".",$invr_bzv1); // print_r($perd_itms); // echo "
COUNT PERIODS ".count($perd_itms); if (count($perd_itms) == 1) { // $invr_domn=$invr_bzv1; // echo "
COUNT PERIODS ".count($perd_itms); $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $sinvr_bzv2=str_replace(" ","+",$invr_bzv2); // echo "
PERD ITMS =0 Er is een enkele woordvorm in uw vraag."; $comm_itms=explode(" ",$invr_bzv1); // print_r($comm_itms); if (count($comm_itms) == 1) { echo "
1 INVR BZV1 ".$invr_bzv1; // include ("word-rule.php"); // include ("word-corp.php"); } if (count($comm_itms) > 1) { // echo "
> 1 INVR BZV1 ".$invr_bzv1; // include ("word-rule.php"); $invr_last=$last_rchs; // include ("word-corp.php"); // include ("sgmt-rule.php"); // include ("conv-tlkd.php"); // include ("comb-rule.php"); } } echo ""; //////////////////////// /////////////////////////////////////////////////////// $bzv1_itms=explode(". ",$invr_bzv1); $si=0; if ($invr_rchs != null) { $splt_itms[$si]=$invr_rchs; $si=$si+1; } // print_r($bzv1_itms); echo ""; // echo "
".$splt_val. "COUNT ".count($bzv1_itms); $mark_itms=array("1" => "?","2" => "!","3" => ",","4" => " - " ,"5" => " @ "); $sgmt_itms=array("?" => "QUESTION","!" => "EXCLAMATION","," => "COMMA","-" => "EXPLANATION","@" => "RELATION"); $sql_gw27="SELECT * FROM rule where `rchs` = 'splt' order by `lnks` desc"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $gw27_result = mysql_query($sql_gw27, $link); $gw27_mtch = mysql_num_rows($gw27_result); // echo "
GRAM rule SQL Aantal entries ".$gw27_mtch." for ".$sql_gw27." and DOMN ".$rbzv1_domn; if ($gw27_mtch > 0 ) { // echo "
rule SQL Aantal entries ".$gw27_mtch." for ".$sql_gw27; // echo "
domn ".$invr_domn. "BZV1 ". $invr_bzv1." BZV2 ".$invr_bzv2; while ($row = mysql_fetch_assoc($gw27_result)) { $gw27_ipad=$row['ipad']; $gw27_taal=$row['taal']; $gw27_domn=$row['domn']; // echo "
GW27 RCHS ".$gw27_rchs; $gw27_lnks=$row['lnks']; $lnks_itms=explode("_",$gw27_lnks); if (count($lnks_itms) > 0) { $splt_itms[$si]=" ".str_replace("_"," ",$gw27_lnks)." "; $si=$si+1; } $gw27_rchs=$row['rchs']; $gw27_datm=$row['datm']; $bzdt_dag=$gw27_rchs; // echo "
SHRT 0001 GW27 DOMN ".$gw27_domn." LNKS ".$gw27_lnks." RCHS ".$gw27_rchs." PROCES ".$gw27_domn." lnks ".$invr_lnks." RCHS ".$invr_rchs; } } // print_r($splt_itms); // print_r($mark_itms); //////////////////////////////// echo ""; $pi=0; foreach($bzv1_itms as $bzv1_key => $bzv1_val) { $perd_itms[$pi]="sentence!period!".$bzv1_val; $pi=$pi+1; // echo ""; foreach($mark_itms as $mark_key => $mark_val) { $rslt_itms=explode($mark_val,$bzv1_val); // echo "
MARK ITMS
"; // print_r($rslt_itms); // echo "
".$mark_val. "COUNT ".count($rslt_itms); if (count($rslt_itms) > 1) { foreach($rslt_itms as $rslt_key => $rslt_val) { // echo ""; $perd_itms[$pi]="mark!".$splt_val."!".$rslt_val; $pi=$pi+1; } } } foreach($splt_itms as $splt_key => $splt_val) { // echo "
".strlen($splt_val)." ".$splt_val. "BZV1 VAL ".$bzv1_val; $text_itms=explode($splt_val,$bzv1_val); // echo "
TEXT ITMS
"; // print_r($text_itms); if (count($text_itms) > 1) { foreach($text_itms as $text_key => $text_val) { if ($hrelt != $text_val) { $hrelt=$text_val; // echo ""; // echo "
RESULTS ".$splt_val." ".$rslt_val; $perd_itms[$pi]=$text_itms[0]."!".$splt_val."!".$text_itms[1]; $pi=$pi+1; } } } } } echo "

".$bzv1_val."
	".$sgmt_itms[$mark_val]."	".$rslt_val."
".$text_itms[0]."	".$splt_val."	".$text_itms[1]."

"; /////////////////////////////////////////////////// $perd_itms=array_unique($perd_itms); // print_r($perd_itms); foreach($perd_itms as $perd_key => $perd_val) { // echo "
KEY ".$perd_key." VAL ".$perd_val; $perd_val=$perd_itms[0]; $perd_dtls=explode("!",$perd_val); // print_r($perd_dtls); $perd_lnks=$perd_dtls[0]; $perd_splt=$perd_dtls[1]; $perd_rchs=$perd_dtls[2]; if ($invr_domn == null) { $invr_domn=substr($perd_rchs,0,128); } $sinvr_domn=str_replace(" ","+",$invr_domn); // echo "
PERD RCHS ".$perd_rchs." INVR DOMN ".$invr_domn; } echo ""; $perd_itms=array_unique($perd_itms); foreach($perd_itms as $perd_key => $perd_val) { // echo "
KEY ".$perd_key." VAL ".$perd_val; $perd_dtls=explode("!",$perd_val); $perd_lnks=$perd_dtls[0]; $perd_splt=$perd_dtls[1]; $perd_rchs=$perd_dtls[2]; $perd_lnks=trim($perd_lnks); $perd_splt=trim($perd_splt); $perd_rchs=trim($perd_rchs); $sinvr_rchs=str_replace(" ","+",$invr_rchs); if ($perd_lnks == "sentence") { ?> '; ?> >>>>>>'; $cmds_ipad=$userip; $rshrt_key=str_replace(" ","_",$invr_bzv2); $cmds_bzv2=$perd_lnks."[ardc[".$text_taal."[".$invr_domn."[".$perd_rchs."[".$invr_lgrm; echo "
EEN CONV RULE INVR BZV2 ".$cmds_bzv2; include ("chbt-cmds-code-2.php"); } $invr_bzv1=$perd_lnks." ".$perd_splt." ".$perd_rchs; // include("comb-rule.php"); // echo "
SPERD VAL ".$sperd_val; // $tlkd_rslt=smta_tlkd($sperd_val."@tlkd"); // print_r($tlkd_rslt); foreach($tlkd_rslt as $tlkd_key => $tlkd_val) { // echo "
KEY ".$tlkd_key; // echo " VAL ".$tlkd_val; } // echo "
PERD RCHS ".$perd_rchs." INVR DOMN ".$invr_domn; // require_once ("conv-tlkd.php"); // print_r($invr_text); $cmds_ipad=$userip; $rshrt_key=str_replace(" ","_",$invr_bzv2); $cmds_bzv2=$perd_lnks."[ardc[".$text_taal."[".$invr_bzv1."[".$perd_rchs."[".$invr_lgrm; echo "
TWEE CONV RULE INVR BZV2 ".$cmds_bzv2; include ("chbt-cmds-code-2.php"); if($perd_splt != "period") { ?> >>>>>>"; /////////////////////// $invr_bzv1=str_replace("_"," ",$invr_text[bzv1]); $invr_bzv2=str_replace(" "," ",$invr_text[bzv2]); $invr_domn=str_replace("_"," ",$invr_text[domn]); $sinvr_domn=str_replace(" ","+",$invr_domn); // echo "
AFTER WORD RULE domn ".$invr_domn. "BZV1 ". $invr_bzv1." BZV2 ".$invr_bzv2." taal ".$invr_taal; $invr_bzv1=str_replace("+"," ",$invr_bzv1); $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $bzv1_itms=explode(" ",$invr_bzv1); // echo "
COUNT ITEMS ".count($bzv1_itms); $cntr_itms=count($bzv1_itms); $rbzv1_domn=str_replace(" ","_",$invr_bzv1); /////////////////// $tlkd_rslt=smta_tlkd($perd_val."@tlkd"); // include("conv-tlkd.php"); // include ("word-rule.php"); // include ("tlkd-rslt.php"); /////////////////// $text_to_read=$invr_bzv1; $text_to_read=str_replace("_"," ",$invr_bzv1); include ("smta-voic.php"); $text_to_read=$text_to_read." ANTWOORD is ".$invr_bzv2; include ("smta-voic.php"); /////////////////// $cmds_ipad=$userip; $rshrt_key=str_replace(" ","_",$invr_bzv2); $cmds_bzv2=$invr_bzv2."[rule[".$invr_taal."[".$invr_domn."[".$invr_bzv1."[".$invr_lgrm; // echo "
DRIE CONV RULE INVR BZV2 ".$cmds_bzv2; include ("chbt-cmds-code-2.php"); ?>

'.$perd_lnks.'	'.$perd_rchs.'
SENTENCE<? echo $perd_splt; ?>	<? echo $perd_rchs; ?>
RELATION	'.$perd_lnks.'
TWEE<? echo $perd_lnks; ?>	<? echo $perd_rchs; ?>